stepper motor


 MOVLW 0xF
 BSF STATUS, 0x5
 BCF STATUS, 0x6
 MOVWF PORTA
 BSF STATUS, 0x5
 BSF STATUS, 0x6
 CLRF PORTD
 BCF STATUS, 0x5
 BCF STATUS, 0x6
 BCF PORTA, 0x7
 BCF PORTA, 0x6
 BCF PORTA, 0x5
 BCF PORTA, 0x4
 CLRF i
 MOVLW 0x4
 SUBWF i, W
 BTFSC STATUS, 0x0
 MOVLW 0x1
 MOVWF __pcstackCOMMON
 MOVF __pcstackCOMMON, W
 ADDWF i, F
 MOVLW 0x4
 SUBWF i, W
 BTFSS STATUS, 0x0
 MOVF i, W
 ADDLW 0x70
 MOVWF FSR
 MOVF INDF, W
 ANDLW 0x1
 MOVWF __pcstackCOMMON
 RRF __pcstackCOMMON, F
 RRF __pcstackCOMMON, F
 MOVF PORTA, W
 XORWF __pcstackCOMMON, W
 ANDLW 0x7F
 XORWF __pcstackCOMMON, W
 MOVWF PORTA
 MOVF i, W
 ADDLW 0x70
 MOVWF FSR
 MOVF INDF, W
 MOVWF __pcstackCOMMON
 BCF STATUS, 0x0
 RRF __pcstackCOMMON, W
 ANDLW 0x1
 MOVWF 0x75
 SWAPF 0x75, F
 RLF 0x75, F
 RLF 0x75, F
 MOVF PORTA, W
 XORWF 0x75, W
 ANDLW 0xBF
 XORWF 0x75, W
 MOVWF PORTA
 BCF PORTA, 0x5
 BCF PORTA, 0x4